home *** CD-ROM | disk | FTP | other *** search
- /*
- * $RCSfile: EAGUI_lib.c,v $
- *
- * $Author: Marcel_Offermans $
- *
- * $Revision: 1.7 $
- *
- * $Date: 1993/11/21 14:19:18 $
- *
- * $Locker: Marcel_Offermans $
- *
- * $State: Exp $
- */
-
- #include "EAGUI.h"
- #include "EAGUI_pragmas.h"
-
- STATIC UBYTE rcs_id_string[] = "$Id: EAGUI_lib.c,v 1.7 1993/11/21 14:19:18 Marcel_Offermans Exp Marcel_Offermans $";
-
- /* varargs stubs which work with SAS/C */
- LONG ea_NewRelation(struct ea_Object *obj_ptr, struct Hook *relmethod_ptr, ULONG tag1, ...)
- {
- return(ea_NewRelationA(obj_ptr, relmethod_ptr, (struct TagItem *)&tag1));
- }
-
- struct ea_Object *ea_NewObject(ULONG type, ULONG tag1, ...)
- {
- return(ea_NewObjectA(type, (struct TagItem *)&tag1));
- }
-
- ULONG ea_GetAttrs(struct ea_Object *obj_ptr, ULONG tag1, ...)
- {
- return(ea_GetAttrsA(obj_ptr, (struct TagItem *)&tag1));
- }
-
- ULONG ea_SetAttrs(struct ea_Object *obj_ptr, ULONG tag1, ...)
- {
- return(ea_SetAttrsA(obj_ptr, (struct TagItem *)&tag1));
- }
-
-